Filename: /text/sbasic/shared/03090405.xhp

FreeLibrary Function [Runtime]
FreeLibrary 関数 [実行時](hd_id3143270.1)

Releases DLLs that were loaded by a Declare statement. A released DLL is automatically reloaded if one of its functions is called. See also: Declare
Declare ステートメントで読み込んだ DLL を解放します。解放後の DLL は、その中の関数が呼び出された場合、自動的に再読み込みされます。次も参照してください：Declare(par_id3147559.2)

Syntax:
構文:(hd_id3148550.3)

FreeLibrary (LibName As String)
FreeLibrary (LibName As String)(par_id3153361.4)

Parameters:
パラメータ:(hd_id3153380.5)

LibName: String expression that specifies the name of the DLL.
LibName:DLL 名を指定する文字列。(par_id3154138.6)

FreeLibrary can only release DLLs that are loaded during Basic runtime. FreeLibrary で解放できる DLL は、Basic の実行時に読み込んだものだけです。(par_id3146923.7)

Example:
例:(hd_id3153363.8)

Declare Sub MyMessageBeep Lib "user32.dll" Alias "MessageBeep" ( long )
Declare Sub MyMessageBeep Lib "user32.dll" Alias "MessageBeep" ( long )(par_id3155855.9)

Sub ExampleDeclare
Sub ExampleDeclare(par_id3149664.11)

Dim lValue As Long
Dim lValue As Long(par_id3148618.12)

lValue = 5000
lValue = 5000(par_id3147350.13)

MyMessageBeep( lValue )
MyMessageBeep( lValue )(par_id3148648.14)

FreeLibrary("user32.dll" )
FreeLibrary("user32.dll" )(par_id3145750.15)

End Sub
End Sub(par_id3149412.16)